module dimensions

  integer  :: jx, jy, jz, jv, jDirection    ! limits      in r-space
  integer  :: nkx, nky, nkz, np             ! limits      in k-space

  real     :: dx,  dy,  dz,  dv             ! resolution  in r-space
  real     :: dkx, dky, dkz, dp             ! resolution  in k-space


  parameter(jx=48, jy= 1, jz=16, jv=256, jDirection=2)
 !parameter(jx=1,  jy=48, jz=16, jv=256, jDirection=2)
 !parameter(jx=48, jy=48, jz=16, jv= 64, jDirection=6)

  real     :: xvec(jx), yvec(jy), zvec(jz), vvec(jv)     ! coord. vectors in r-space
  real     :: kXvec(jx), kYvec(jy), kZvec(jz), pvec(jv)  ! coord. vectors in k-space

end module
